home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / PASCAL / 0391B.ZIP / WINDMNGR.ARC / DEFS.PAS < prev    next >
Pascal/Delphi Source File  |  1980-01-01  |  445b  |  12 lines
  1. Procedure SetDefs;
  2. begin
  3.      SetWindow(1,5,2,40,20,32,64,2,1,'',7,7,1);
  4.      SetWindow(2,21,12,69,23,11,7,8,0,'',7,7,1);
  5.      SetWindow(3,35,5,62,21,14,95,3,1,'',7,7,1);
  6.      SetWindow(4,65,0,79,22,22,12,4,0,'',7,7,1);
  7.      SetWindow(5,17,0,46,10,17,11,5,0,'',7,7,1);
  8.      SetWindow(6,25,7,52,18,15,33,2,1,'',7,7,1);
  9.      SetWindow(7,8,0,14,24,12,15,7,0,'',7,7,1);
  10.      SetWindow(8,11,2,49,15,31,31,2,1,' LAST WINDOW ',11,7,5);
  11. end;
  12.